home *** CD-ROM | disk | FTP | other *** search
/ Java Developer's Companion / Java Developer's Companion.iso / documentation / tutorial / native1.1 / implementing / example-1.1 / FieldAccess.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-07-13  |  1.6 KB  |  51 lines
  1. /*
  2.  * Copyright (c) 1995-1997 Sun Microsystems, Inc. All Rights Reserved.
  3.  *
  4.  * Permission to use, copy, modify, and distribute this software
  5.  * and its documentation for NON-COMMERCIAL purposes and without
  6.  * fee is hereby granted provided that this copyright notice
  7.  * appears in all copies. Please refer to the file "copyright.html"
  8.  * for further important copyright and licensing information.
  9.  *
  10.  * SUN MAKES NO REPRESENTATIONS OR WARRANTIES ABOUT THE SUITABILITY OF
  11.  * THE SOFTWARE, EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED
  12.  * TO THE IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
  13.  * PARTICULAR PURPOSE, OR NON-INFRINGEMENT. SUN SHALL NOT BE LIABLE FOR
  14.  * ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR
  15.  * DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES.
  16.  */
  17. #include <stdio.h>
  18. #include <jni.h>
  19. #include "FieldAccess.h"
  20.  
  21. JNIEXPORT void JNICALL 
  22. Java_FieldAccess_accessFields(JNIEnv *env, jobject obj)
  23. {
  24.   jclass cls = (*env)->GetObjectClass(env, obj);
  25.   jfieldID fid;
  26.   jstring jstr;
  27.   const char *str;
  28.   jint si;
  29.  
  30.   printf("In C:\n");
  31.  
  32.   fid = (*env)->GetStaticFieldID(env, cls, "si", "I");
  33.   if (fid == 0)
  34.     return;
  35.   si = (*env)->GetStaticIntField(env, cls, fid);
  36.   printf("  FieldAccess.si = %d\n", si);
  37.   (*env)->SetStaticIntField(env, cls, fid, 200);
  38.   
  39.   fid = (*env)->GetFieldID(env, cls, "s", "Ljava/lang/String;");
  40.   if (fid == 0)
  41.     return;
  42.   jstr = (*env)->GetObjectField(env, obj, fid);
  43.   str = (*env)->GetStringUTFChars(env, jstr, 0);
  44.   printf("  c.s = \"%s\"\n", str);
  45.   (*env)->ReleaseStringUTFChars(env, jstr, str);
  46.  
  47.   jstr = (*env)->NewStringUTF(env, "123");
  48.   (*env)->SetObjectField(env, obj, fid, jstr);
  49. }
  50.  
  51.